А)напишите процедуру,которая при заданных a,b выводит среднее число (используя при этом переменные) б)дается буква или символ. напишите программу определяющая буква это или символ

262

428

Посмотреть ответы 2

Ответы на вопрос:

SashaLaik

Информатика

4,8(23 оценок)

А)// pascalabc.net 3.1, сборка 1174 от 22.02.2016 var a,b: real; procedure writeavg; begin writeln('среднее= ',(a+b)/2) end; begin write('a,b='); read(a,b); writeavg end. тестовое решение: a,b=6 4.9 среднее= 5.45 б) // pascalabc.net 3.1, сборка 1174 от 22.02.2016 begin var c: =readlnchar('введите символ: '); if c in ['a'..'z','а'..'я','ё','ё'] then writeln('буква') else if c in ['0'..'9'] then writeln('цифра') else writeln('спецзнак') end. тестовое решение: введите символ: i буква