1. Информатика
  2. Паскаль дано целое число

Паскаль дано целое число . если оно равно 7 то вывести воскрксенье

Strong996 Strong996    1   03.10.2019 14:50    1

Ответы
tibeck120 tibeck120  09.10.2020 14:31
Var x:integer;
begin
readln(x);
if x=7 then
writeln("воскрксенье");
end.
ПОКАЗАТЬ ОТВЕТЫ
Впмриирсгишммп Впмриирсгишммп  09.10.2020 14:31

var

num: integer;

begin

ReadLn(num);

If num = 7 Then WriteLn("Воскресенье");

end;

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
baxitclash baxitclash  30.11.2019 13:04
Найти сумму квадратов всех натуральных чисел от 1 до 100. решить используя цикл while и repeat...
лиза2741 лиза2741  30.11.2019 13:11
Простейший алгоритм в codegear...
flash64 flash64  30.11.2019 13:18
78 построить блок-схемувыполнить 2.4...
Evildevil2 Evildevil2  06.09.2019 09:20
Определите значение s s=0 for k=1 to 5 do for j=1 to k do s=s+k...
Propert Propert  06.09.2019 09:20
Текст рассказа набран на компьютере.информационный объём получившегося файла 15кбайт.текст занимает 10 страниц, на каждой странице одинаковое количество строк, в каждой...
Vladtop11234 Vladtop11234  06.09.2019 09:20
Скорость передачи информации 1200 бит/с.за сколько времени данный модем передаст информацию состоящую из 3070 символов. скорость передачи информации 2400 бит/с.сколько...
ArturGafiyatullin145 ArturGafiyatullin145  27.09.2019 06:16
2для какого из значений числа хистинно высказывание: не( x 5) и (x 4)1) 42) 53) 64) 7ответ: ​...
Mashannjjj Mashannjjj  27.09.2019 06:15
2для какого из имён ложно высказывание: не (первая буква согласная) или не (последняя буква гласная)? 1) егор2) тимур3) вера4) любовьответ: . ​...
orudcovamilana orudcovamilana  27.09.2019 06:13
Составить 10 разрядно в двоичной системе и составить 4 восьмеричных числа...
denthegamerp01iih denthegamerp01iih  27.09.2019 06:11
Уровень - синтезсколько останется места на флеш-накопителе с емкостью2 гбайт, если на нее записать книгу, в которой 256 страницпо 95 строк и 80 символов в строке?...

Популярные вопросы