Программа для суммы двух чисел

Знания

Информатика

1 ответ:

kosogor [17]4 года назад

0 0

Var a,b:integer;
begin
readln(a,b);
writeln(a+b);
end.

Читайте также

Декларативный знания на какие вопросы отаечают

mihadich

Декларативные / Описательные знания

Отвечают на вопросы: Что это? Как это бывало / бывает / случается? Я чувствую / думаю, что…

Где наиболее распространены: Философия Культурология Искусствоведение Художественная критика

0 0

4 года назад

ПЛЕСССС.в некоторой книге без картинок 50 страниц.На каждой странице в среднем по 30 строк и по 30 символов в каждой строке .Выч

zara666

2^5 < 50 <2^6 ----> 6 бит для кодировки одного символа
F= 6*50*30*30 = 270 000 бит=
=270 000 :8 байт =33750 байт =33 750 :1024 Кбайт≈ 33 Кбайта

0 0

3 года назад

Найдите сумму квадратов всех целых чисел от а до 10. Значение а вводится с клавиатуры. Предусмотрите проверку корректности ввода

Butcher [10]

// PascalABC.NET 3.1, сборка 1256 от 21.06.2016
begin
var a:=ReadInteger('Введите целое число, не превышающее 9:');
if a<10 then Writeln('S2=',Range(a,10).Select(i->i*i).Sum)
else Writeln('Введенное значение больше 9')
end.

<u><em>Тестовое решение</em></u>
Введите целое число, не превышающее 9: -7
S2=525

0 0

4 года назад

Найти количество нулевых элементов среди 20 в веденых с клавиатуры

Zyfan

Var
i,count:integer;
h: array [1..20] of integer;
begin
count:=0;
writeln('Введите элементы');
for i:=1 to 20 do
read(h[i]);
for i:=1 to 20 do
if h[i]>0 then
count:=count+1;
writeln('Количество нулевых элементов ', count)
end.

0 0

4 года назад

Множество, содержащее в себе все элементы нескольких множеств.11 букв, четвёртая буква "е" и последняя тоже "е".

Kot 34

о б ъ е д и н е н и е

0 0

4 года назад

Прочитать ещё 2 ответа