using System; namespace ConsoleApp1{ class Program { static void Main(string[] args) { //переменная для хранения суммы, изначально = 0 var sum = 0; //вводимое число, изначально = 0 int number = -1; //пока число не равно 0 while (number != 0) { //выводим сообщение с ввести число Console.Write("Введите число: "); //вводим число number = int.Parse(Console.ReadLine()); //суммуируем sum += number; } //Выводим результат Console.WriteLine("Выход из цикла. Сумма = " + sum); Console.ReadKey(); } }}
procedure ColArc(x, y: integer; r: integer; nc: byte); begin SetPenColor(rgb(c[nc, 1], c[nc, 2], c[nc, 3])); Arc(x, y, r + 10, 0, 180); Arc(x, y, r - 10, 0, 180); line(x - r - 11, y - 2, x - r + 11, y - 2); line(x + r - 11, y - 2, x + r + 11, y - 2); floodfill(x, y - r, rgb(c[nc, 1], c[nc, 2], c[nc, 3])); end;
begin setwindowsize(500, 300); for i := 1 to 7 do ColArc(250, 300, 100 + (i * 20), i); end.
using System;
namespace ConsoleApp1{ class Program { static void Main(string[] args) { //переменная для хранения суммы, изначально = 0 var sum = 0; //вводимое число, изначально = 0 int number = -1; //пока число не равно 0 while (number != 0) { //выводим сообщение с ввести число Console.Write("Введите число: "); //вводим число number = int.Parse(Console.ReadLine()); //суммуируем sum += number; } //Выводим результат Console.WriteLine("Выход из цикла. Сумма = " + sum); Console.ReadKey(); } }}
const
c: array [1..7, 1..3] of byte = ((50, 50, 133), (0, 0, 255), (0, 160, 227), (0, 255, 0), (255, 255, 0), (239, 127, 26), (255, 0, 0));
var
i: byte;
procedure ColArc(x, y: integer; r: integer; nc: byte);
begin
SetPenColor(rgb(c[nc, 1], c[nc, 2], c[nc, 3]));
Arc(x, y, r + 10, 0, 180);
Arc(x, y, r - 10, 0, 180);
line(x - r - 11, y - 2, x - r + 11, y - 2);
line(x + r - 11, y - 2, x + r + 11, y - 2);
floodfill(x, y - r, rgb(c[nc, 1], c[nc, 2], c[nc, 3]));
end;
begin
setwindowsize(500, 300);
for i := 1 to 7 do
ColArc(250, 300, 100 + (i * 20), i);
end.